val finir_partie:
  ?verbeux:bool ->
  Carte.carte list array ->   (* Cartes de tout le monde *)
  int ->                      (* preneur *)
  int ->                      (* appelé *)
  Carte.couleur option ->     (* couleur demandée *)
  Carte.carte option array -> (* pli en cours *)
  int array                   (* nombre de demi-points par joueur *)
  * int array                 (* nombre de bouts par joueur, équipes comprises *)
(* les cartes de tout le monde -> preneur -> appelé -> couleur_demandée -> pli en cours -> nombre de demi-points gagnés *)
